﻿Public Class configuracoesBO
    Dim configuracoes As New configuracoesDAO
    Public Function getConfiguracoes() As configuracoesVO
        Try
            Return configuracoes.getConfiguracoes
        Catch ex As Exception
            Throw ex
        End Try
    End Function
    Public Function udpateConfiguracoes(ByVal countLock As Integer, _
                                  ByVal IdregistroLock As Integer) As Integer
        Try
            Return configuracoes.udpateConfiguracoes(countLock, IdregistroLock)
        Catch ex As Exception
            Throw ex
        End Try
    End Function

End Class
